This forum is closed to new posts and
responses. Individual names altered for privacy purposes. The information contained in this website is provided for informational purposes only and should not be construed as a forum for customer support requests. Any customer support requests should be directed to the official HCL customer support channels below:
RE: Seeking for help on Lotus Script Functionality ~Lily Nonwetherjip 9.Dec.03 02:25 PM a Web browser Applications Development 6.0.1Windows 2000
search for NotesDbDirectory in the help and the version 5 forum:
This sample code should also help:
Dim dbSource As NotesDatabase
Dim strFilePath As String
Dim strFileNameFind As String
Dim directory As NotesDbDirectory
Set directory = New NotesDbDirectory( "" )
Set dbSource = directory.GetFirstDatabase( DATABASE )
Call dbSource.open( "" , "" )
While Not dbsource Is Nothing
strFilePath = Ucase$(dbSource.FilePath)
strFileNameFind = Ucase$("E:\Lotus\Domino\Data\Mail\" + dbSource.FileName)
If (strFilePath = strFileNameFind) Then
'You found a file, so do something...
Set dbSource = directory.GetNextDatabase
Call dbSource.open( "" , "" )
Wend
Return to top
. . RE: Seeking for help on Lotus Scrip... (~Lily Nonwether... 9.Dec.03) 
Print this page
